error message typo

diff --git a/Remote/Tahoe.hs b/Remote/Tahoe.hs
index 8c0d6d1631c772b8dd8b2d595016eafe37ca947e..e51ccf953138811d79e49def99726ba4fff6774d 100644 (file)
--- a/Remote/Tahoe.hs
+++ b/Remote/Tahoe.hs
@@ -164,7 +164,7 @@ retrieve rs hdl k _f d _p _ = do
        go (Just cap) = do
                showOutput
                unlessM (liftIO $ requestTahoe hdl "get" [Param cap, File (fromOsPath d)]) $
-                       giveup "tahoe failed to reteieve content"
+                       giveup "tahoe failed to retrieve content"
 
 remove :: Maybe SafeDropProof -> Key -> Annex ()
 remove _ _ = giveup "content cannot be removed from tahoe remote"